home *** CD-ROM | disk | FTP | other *** search
/ Apple Reference & Presen…rary 6 (Reseller Edition) / Apple Ref. & Pres. Lib.v6.0.toast / pc / 3-Presentations / Apple Demos / CPUs / Macintosh Solutions Demo / Macintosh Solutions 1.0 / card_12196.txt < prev    next >
Text File  |  1990-08-24  |  8KB  |  335 lines
  1. -- card: 12196 from stack: in.0
  2. -- bmap block id: 9942
  3. -- flags: 4000
  4. -- background id: 4734
  5. -- name: USAC1.1
  6.  
  7.  
  8. -- part 4 (button)
  9. -- low flags: 00
  10. -- high flags: A003
  11. -- rect: left=325 top=93 right=115 bottom=489
  12. -- title width / last selected line: 0
  13. -- icon id / first selected line: 0 / 0
  14. -- text alignment: 1
  15. -- font id: 0
  16. -- text size: 12
  17. -- style flags: 0
  18. -- line height: 16
  19. -- part name: Which Macintosh?…
  20. ----- HyperTalk script -----
  21.  
  22. on mouseUp -- College Student Solution
  23.   determineSoftware -- bg script
  24.   put char 4 of short name of this card into whichCategory
  25.   repeat with i = 11 to 15
  26.     set cursor to busy
  27.     if the hilight of cd btn i = true then
  28.       goSolution whichCategory,1.2
  29.       exit mouseUp
  30.     end if
  31.   end repeat
  32.   repeat with i = 2 to 10
  33.     set cursor to busy
  34.     if the hilight of cd btn i = true then
  35.       goSolution whichCategory,1.1
  36.       exit mouseUp
  37.     end if
  38.   end repeat
  39.   answer "Please select at least one software category."
  40. end mouseUp
  41.  
  42.  
  43.  
  44.  
  45. -- part 5 (button)
  46. -- low flags: 00
  47. -- high flags: A005
  48. -- rect: left=289 top=244 right=265 bottom=423
  49. -- title width / last selected line: 0
  50. -- icon id / first selected line: 0 / 0
  51. -- text alignment: 1
  52. -- font id: 0
  53. -- text size: 12
  54. -- style flags: 0
  55. -- line height: 16
  56. -- part name: Word Processing
  57. ----- HyperTalk script -----
  58. on mouseUp
  59.   if the hilight of me is true then putMeInList (short name of me)
  60.   else getMeOutOfList (short name of me)
  61. end mouseUp
  62.  
  63.  
  64.  
  65. -- part 6 (button)
  66. -- low flags: 00
  67. -- high flags: A005
  68. -- rect: left=289 top=204 right=225 bottom=423
  69. -- title width / last selected line: 0
  70. -- icon id / first selected line: 0 / 0
  71. -- text alignment: 1
  72. -- font id: 0
  73. -- text size: 12
  74. -- style flags: 0
  75. -- line height: 16
  76. -- part name: Spreadsheets
  77. ----- HyperTalk script -----
  78. on mouseUp
  79.   if the hilight of me is true then putMeInList (short name of me)
  80.   else getMeOutOfList (short name of me)
  81. end mouseUp
  82.  
  83.  
  84.  
  85. -- part 7 (button)
  86. -- low flags: 00
  87. -- high flags: A005
  88. -- rect: left=79 top=204 right=225 bottom=213
  89. -- title width / last selected line: 0
  90. -- icon id / first selected line: 0 / 0
  91. -- text alignment: 1
  92. -- font id: 0
  93. -- text size: 12
  94. -- style flags: 0
  95. -- line height: 16
  96. -- part name: Database
  97. ----- HyperTalk script -----
  98. on mouseUp
  99.   if the hilight of me is true then putMeInList (short name of me)
  100.   else getMeOutOfList (short name of me)
  101. end mouseUp
  102.  
  103.  
  104.  
  105. -- part 8 (button)
  106. -- low flags: 00
  107. -- high flags: A005
  108. -- rect: left=79 top=244 right=265 bottom=213
  109. -- title width / last selected line: 0
  110. -- icon id / first selected line: 0 / 0
  111. -- text alignment: 1
  112. -- font id: 0
  113. -- text size: 12
  114. -- style flags: 0
  115. -- line height: 16
  116. -- part name: E-Mail
  117. ----- HyperTalk script -----
  118. on mouseUp
  119.   if the hilight of me is true then putMeInList (short name of me)
  120.   else getMeOutOfList (short name of me)
  121. end mouseUp
  122.  
  123.  
  124.  
  125. -- part 9 (button)
  126. -- low flags: 00
  127. -- high flags: A005
  128. -- rect: left=289 top=144 right=165 bottom=423
  129. -- title width / last selected line: 0
  130. -- icon id / first selected line: 0 / 0
  131. -- text alignment: 1
  132. -- font id: 0
  133. -- text size: 12
  134. -- style flags: 0
  135. -- line height: 16
  136. -- part name: Presentations
  137. ----- HyperTalk script -----
  138. on mouseUp
  139.   if the hilight of me is true then putMeInList (short name of me)
  140.   else getMeOutOfList (short name of me)
  141. end mouseUp
  142.  
  143.  
  144.  
  145. -- part 10 (button)
  146. -- low flags: 00
  147. -- high flags: A005
  148. -- rect: left=79 top=264 right=285 bottom=218
  149. -- title width / last selected line: 0
  150. -- icon id / first selected line: 0 / 0
  151. -- text alignment: 1
  152. -- font id: 0
  153. -- text size: 12
  154. -- style flags: 0
  155. -- line height: 16
  156. -- part name: Library Access
  157. ----- HyperTalk script -----
  158. on mouseUp
  159.   if the hilight of me is true then putMeInList (short name of me)
  160.   else getMeOutOfList (short name of me)
  161. end mouseUp
  162.  
  163.  
  164.  
  165. -- part 11 (button)
  166. -- low flags: 00
  167. -- high flags: A005
  168. -- rect: left=79 top=144 right=165 bottom=250
  169. -- title width / last selected line: 0
  170. -- icon id / first selected line: 0 / 0
  171. -- text alignment: 1
  172. -- font id: 0
  173. -- text size: 12
  174. -- style flags: 0
  175. -- line height: 16
  176. -- part name: Bibliographic Tools
  177. ----- HyperTalk script -----
  178. on mouseUp
  179.   if the hilight of me is true then putMeInList (short name of me)
  180.   else getMeOutOfList (short name of me)
  181. end mouseUp
  182.  
  183.  
  184.  
  185. -- part 12 (button)
  186. -- low flags: 00
  187. -- high flags: A005
  188. -- rect: left=79 top=284 right=305 bottom=218
  189. -- title width / last selected line: 0
  190. -- icon id / first selected line: 0 / 0
  191. -- text alignment: 1
  192. -- font id: 0
  193. -- text size: 12
  194. -- style flags: 0
  195. -- line height: 16
  196. -- part name: Note Organizers
  197. ----- HyperTalk script -----
  198. on mouseUp
  199.   if the hilight of me is true then putMeInList (short name of me)
  200.   else getMeOutOfList (short name of me)
  201. end mouseUp
  202.  
  203.  
  204.  
  205. -- part 13 (button)
  206. -- low flags: 00
  207. -- high flags: A005
  208. -- rect: left=79 top=224 right=245 bottom=284
  209. -- title width / last selected line: 0
  210. -- icon id / first selected line: 0 / 0
  211. -- text alignment: 1
  212. -- font id: 0
  213. -- text size: 12
  214. -- style flags: 0
  215. -- line height: 16
  216. -- part name: Discipline Specific Software
  217. ----- HyperTalk script -----
  218. on mouseUp
  219.   if the hilight of me is true then putMeInList (short name of me)
  220.   else getMeOutOfList (short name of me)
  221. end mouseUp
  222.  
  223.  
  224.  
  225. -- part 14 (button)
  226. -- low flags: 00
  227. -- high flags: A005
  228. -- rect: left=79 top=164 right=185 bottom=218
  229. -- title width / last selected line: 0
  230. -- icon id / first selected line: 0 / 0
  231. -- text alignment: 1
  232. -- font id: 0
  233. -- text size: 12
  234. -- style flags: 0
  235. -- line height: 16
  236. -- part name: CAD/CAM
  237. ----- HyperTalk script -----
  238. on mouseUp
  239.   if the hilight of me is true then putMeInList (short name of me)
  240.   else getMeOutOfList (short name of me)
  241. end mouseUp
  242.  
  243.  
  244.  
  245. -- part 15 (button)
  246. -- low flags: 00
  247. -- high flags: A005
  248. -- rect: left=289 top=184 right=205 bottom=460
  249. -- title width / last selected line: 0
  250. -- icon id / first selected line: 0 / 0
  251. -- text alignment: 1
  252. -- font id: 0
  253. -- text size: 12
  254. -- style flags: 0
  255. -- line height: 16
  256. -- part name: Software Engineering
  257. ----- HyperTalk script -----
  258. on mouseUp
  259.   if the hilight of me is true then putMeInList (short name of me)
  260.   else getMeOutOfList (short name of me)
  261. end mouseUp
  262.  
  263.  
  264.  
  265. -- part 16 (button)
  266. -- low flags: 00
  267. -- high flags: A005
  268. -- rect: left=289 top=164 right=185 bottom=428
  269. -- title width / last selected line: 0
  270. -- icon id / first selected line: 0 / 0
  271. -- text alignment: 1
  272. -- font id: 0
  273. -- text size: 12
  274. -- style flags: 0
  275. -- line height: 16
  276. -- part name: Publishing
  277. ----- HyperTalk script -----
  278. on mouseUp
  279.   if the hilight of me is true then putMeInList (short name of me)
  280.   else getMeOutOfList (short name of me)
  281. end mouseUp
  282.  
  283.  
  284.  
  285. -- part 17 (button)
  286. -- low flags: 00
  287. -- high flags: A005
  288. -- rect: left=79 top=184 right=205 bottom=254
  289. -- title width / last selected line: 0
  290. -- icon id / first selected line: 0 / 0
  291. -- text alignment: 1
  292. -- font id: 0
  293. -- text size: 12
  294. -- style flags: 0
  295. -- line height: 16
  296. -- part name: Data Entry & Retrieval
  297. ----- HyperTalk script -----
  298. on mouseUp
  299.   if the hilight of me is true then putMeInList (short name of me)
  300.   else getMeOutOfList (short name of me)
  301. end mouseUp
  302.  
  303.  
  304.  
  305. -- part 18 (button)
  306. -- low flags: 00
  307. -- high flags: A005
  308. -- rect: left=289 top=224 right=245 bottom=428
  309. -- title width / last selected line: 0
  310. -- icon id / first selected line: 0 / 0
  311. -- text alignment: 1
  312. -- font id: 0
  313. -- text size: 12
  314. -- style flags: 0
  315. -- line height: 16
  316. -- part name: Unix
  317. ----- HyperTalk script -----
  318. on mouseUp
  319.   if the hilight of me is true then putMeInList (short name of me)
  320.   else getMeOutOfList (short name of me)
  321. end mouseUp
  322.  
  323.  
  324.  
  325. -- part contents for background part 1
  326. ----- text -----
  327. USAC1.1
  328.  
  329. -- part contents for background part 3
  330. ----- text -----
  331. 33
  332.  
  333. -- part contents for background part 7
  334. ----- text -----
  335. Click to select the software categories that interest you, then click the ‚ÄúWhich Macintosh?‚Ķ‚Äù button to see the recommended Macintosh.